home *** CD-ROM | disk | FTP | other *** search
/ The CDPD Public Domain Collection for CDTV 4 / CDPD_IV.bin / e / mailinglists / amigae.0793july.archive / 000043_crash!cislabs.pitt.edu!cjfst4_Wed, 21 Jul 93 19:47:04 PST.msg < prev    next >
Internet Message Format  |  1994-05-26  |  1KB
  1. Received: by bkhouse.cts.com (V1.16/Amiga)
  2.     id AA00000; Wed, 21 Jul 93 19:47:04 PST
  3. Received: from phantom.cislabs.pitt.edu by crash.cts.com with smtp
  4.     (Smail3.1.28.1 #15) id m0oInJg-0000UUC; Wed, 21 Jul 93 16:11 PDT
  5. Received: from meg.cislabs.pitt.edu by phantom.cislabs.pitt.edu (4.1/1.34)
  6.     id AA20499; Wed, 21 Jul 93 19:11:17 EDT
  7. Received: by meg.cislabs.pitt.edu (4.1/EMI-2.1)
  8.     id AA01548; Wed, 21 Jul 93 19:11:14 EDT
  9. Message-Id: <9307212311.AA01548@meg.cislabs.pitt.edu>
  10. Date: Wed, 21 Jul 1993 19:11:13 -0400 (EDT)
  11. X-Mailer: ELM [version 2.4 PL21]
  12. Mime-Version: 1.0
  13. Content-Type: text/plain; charset=US-ASCII
  14. Content-Transfer-Encoding: 7bit
  15. Content-Length: 558
  16. From: cjfst4@cislabs.pitt.edu
  17. To: amigae@bkhouse.cts.com (Amiga-E List)
  18. Subject: Help with datestamps
  19.  
  20. I hope someone can help me with this problem...I can't seem to get
  21. DateStamp and DateToStr working right <sigh>.  I keep on getting an
  22. 'illegal use of/reference to object' on this line:
  23.  
  24.     date.stamp := New(SIZEOF datestamp)
  25.  
  26.  
  27. ----8<----8<----
  28.  
  29. MODULE 'dos/dos', 'dos/datetime'
  30.  
  31. PROC main()
  32.  
  33. DEF date : PTR TO datetime,
  34.     s[10] : ARRAY OF CHAR
  35.  
  36.     date := New(SIZEOF datetime)
  37.     date.stamp := New(SIZEOF datestamp)
  38.     date.stamp := DateStamp(date.stamp)
  39.     date.strdate := s
  40.     DateToStr(date)
  41.     WriteF('date: \s\n',s)
  42.  
  43. ENDPROC
  44.  
  45. ----8<----8<----